perm filename PUB.LOG[2,TES]3 blob
sn#030672 filedate 1973-03-08 generic text, type T, neo UTF8
00100 8 MARCH 1973 TES
00200
00300 New PUB put up a couple of days ago. Here is a summary of changes
00400 from the implementor's viewpoint (see NEWS for user's viewpoint).
00500 This is designed to be a guide when examining a SRCCOM.
00600
00700 PUB.SAI
00800 ERRLINE, WARN
00900 Simulate SAIL progress reports
01000 INTEGER SWDBACK described in PUBDFS.SAI
01100 ANYSTART
01200 SCAN(M,1,DUMMY) drops superfluous blanks
01300 from file name for progress report
01400 BRC="P" case: Ignore /PUB switch (see RPGSTART)
01500 RPGSTART
01600 We now read QQSVCM.RPG instead of QQPUB.RPG
01700 because from the latter RPG was
01800 throwing away output file extension!
01900 SCREATE,SGREM,ZEROWORDS,ZEROSTRINGS,SGROW
02000 These changes were made months ago to accomodate
02100 the way new SAIL handles dynamic arrays.
02200 GROWNESTS,GROWOWLS
02300 DUMMY ← 0 corrects a spurious error message bug
02400 SWICHBACK,SWICHF
02500 Changed for new-style progress reports
02600 SEND
02700 ASSUREAREA omission found by RKJ at CMU
02800 ALFIZE
02900 Not changed, but note that SEND INDEX
03000 templates are restricted to one line
03100 because LF is the entry delimiter
03200 FIND_CHR, TURN
03300 Changes to allow:
03400 TURN ON/OFF TAB (see NEWS)
03500 Several characters to be turned on
03600 for left brace at one time
03700 ENDBLOCK
03800 1/18 fix: RESPTYPE case 2: Signals in blocks.
03900 MODETYPE: fixes GROUP BEGIN...END
04000 OPENAREA: a futile attempt to catch the
04100 infinite loop caused by areas that
04200 start at CHAR>1.
04300 CVALF: Roman numerals (found by RKJ at CMU).
04400 FIND_ROOM
04500 IF FROMCOL>COLS THEN FOOTTOP←1 ; (RKJ AT CMU)
04600 PLACELINE
04700 IF FOOTNUM OR FOOTTOP AND COL>COLS THEN -(RKJ)
04800 INITIALIZATION
04900 All calls on SAT now gone (see SCREATE above)
05000 Control characters: added "$", LCURLY, DOLLAR.
05100 FAMILYHAS: replaced CURLYQ by DOLLARQ (see PASS).
05200 ODD-EVEN-MAX-MIN: added MOD, fixed DPB bug (RKJ)
05300 THISFILE,MAINFILE: progress report change.
05400 DEFN_BRC: added $ and ) for alternate horseshoes.
05500 DEFN_BRCS: allows several chars to mean left brace.
05600 EPSCHAR: eliminated, replaced by DEFN_BRCS.
05700 SETBREAK(TO_COMMA_RPAR..): eliminated vertical
05800 bar from omitted characters.
05900 Omitted P U B P A S S O N E message(see SWICHF)
06000 PUBSTD←TRUE: suppresses progress reports on PUBSTD.DFS
06100 DSKPPN instead of GETPPN new SU UUO for ALIAS 2,TES.
06200
06300 PARSER.SAI
06400 RD
06500 END "PGMARK": changes progress reporting (see SWICHF)
06600 BEGIN "EXPAND TABS": allows TURN ON TAB
06700 PASS
06800 ie 1... Changes $( to left horseshoe in command mode.
06900 NOTE: Unpublished feature eliminated wherein
07000 {...} in expressions were side effects.
07100 ie 4... Changes ]$ to right brace in command mode.
07200 E
07300 IF OROP < 0 ... (ANY ← ALL) :Fixes IF FALSE AND TRUE.
07400 DEFN
07500 Allows $( and )$ for horseshoe substitutes.
07600 Allows $[ or equivalent and ]$ for brace substitutes.
07700 DBLANKPAGE
07800 Implements BLANK PAGE N command (see NEWS)
07900 DLOCAL
08000 Fixes VARIABLE declarations.
08100 DPORTION
08200 Fixed blowup when INSERT...PORTION...RECEIVE occurred
08300 but no SEND's.
08400 DTABS
08500 IF ON ... Fixes IF FALSE THEN TABS ...
08600 DTURN
08700 Allows TURN ON/OFF TAB.
08800 Checks for unequal length operands of FOR.
08900 CHECK_CONSISTENCY in LABELDEF
09000 Wasn't checking consistency of P-values.
09100 COMMAND
09200 BLANK PAGE added
09300
09400 FILLER.SAI
09500 EMIT
09600 1/9/73 fix: LASTWDBRK=OAKS disambiguates two uses
09700 of altmode (damnit).
09800 SIGNA
09900 1/9/73 fix: IF ON THEN LAST←LAST+ARGS, fix bug.
10000 PROCESS
10100 ie 18... POSN≤MAXIM instead of < to fix bug.
10200 EMIT("_") so TURN ON .. FOR "_" works.
10300 ie 23... Treats $[ or equivalent as left brace.
10400 TEXTLINE
10500 ie 1... LEN←CVD(E("5",0)) ; Thanks to RKJ.
10600 ITS changed to ITSCH wherever possible for speed (ha).
10700 ie 3... Fixes $["Unit!" Label]$ bug.
10800
10900 PUBDFS.SAI
11000 BBPP replaced by POINT for IXWD and friends to fix bug
11100 in which COUNT PAGE and AREA TEXT could not be
11200 declared inside blocks since New SAIL came up.
11300 MODEWDS
11400 Add TABTAB
11500 Table of Character Families and Species
11600 Reformatted to line up columns.
11700 Replaced CURLYQ by DOLLARQ (see PASS).
11800 TERNAL INTEGER
11900 Added SWDBACK and PUBSTD for progress reports.
12000 Added DEFN_BRCS to allow multiple chars to mean
12100 left brace. Should have got rid of EPSCHAR.
12200
12300 PUB2.SAI
12400 Changed LPT tests to eliminate initial blank page.
12500 Shortened Progress Report message.
12600
12700 PUBPRO.SAI
12800 Added a function.
12900
13000 PUBSTD.DFS
13100 SINGLE SPACE etc. now break before changing SPREAD.
13200
13300
13400 ********************